From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 29 Apr 1993 02:22:48 +0000 (+0000)
Subject: (LOADHIST_ATTACH): New macro.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~96455
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=c5e3de70d8b00803e8d97de223108bc2a17ea9dd;p=emacs.git

(LOADHIST_ATTACH): New macro.
(Vcurrent_load_list, Vload_history): Vars declared.
---

diff --git a/src/lisp.h b/src/lisp.h
index a89c5290a69..57a6a2f5092 100644
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -1043,6 +1043,10 @@ extern Lisp_Object Fintern (), Fintern_soft (), Fload ();
 extern Lisp_Object Fget_file_char (), Fread_char ();
 extern Lisp_Object Feval_current_buffer (), Feval_region ();
 extern Lisp_Object intern (), oblookup ();
+#define LOADHIST_ATTACH(x) \
+ if (initialized) Vcurrent_load_list = Fcons (x, Vcurrent_load_list)
+extern Lisp_Object Vcurrent_load_list;
+extern Lisp_Object Vload_history;
 
 /* Defined in eval.c */
 extern Lisp_Object Qautoload, Qexit, Qinteractive, Qcommandp, Qdefun, Qmacro;
@@ -1249,3 +1253,4 @@ extern long *xmalloc (), *xrealloc ();
 extern void xfree ();
 
 extern char *egetenv ();
+